let liste_adj1 = [|[1;2;3];[0;2];[0;1;3];[0;2]|];;

let liste_adj2 = [|[2];[2];[0;1;3;4];[2];[2]|];;

let liste_adj3 = [|[1;2];[0;3;4];[0;3;5];[1;2];[1;5];[2;4];[7];[6]|];;

let liste_adj4 = [|[1;2];[0;2];[0;1;3];[2];[5];[4;6];[5]|];;